00100	QQQ
00200	<DUMY 0 1 20; 
00300	P2 0; 
00400	P3 RHY/8/16/8/16/6///16////-1*; 
00500	P4 RHY/16///32./64/8./16/8////9/11/13/16/18/22/28/-1*;
00600	P5 RHY/4./8//REP 3/4./16//8/16/8.,8/8/-2*;
00700	P6 RHY/10/////4/8//12///32///8/8.//16//-4.*;
00750	P7 RHY/32/16/32//4/12/9/7.5/20/4./4/16///-3*;
00800	P9 SUBN 11;
00900	END;
01000	FM 0 30;
01200	P2 SUBN 1 1,5.99;
01300	P3 1 60 90;
01400	P4 1000;
01500	P5 F12;
01600	P6 F11;
01700	P7 0;
01800	P8 "800/P3";
01900	P9 "P3*5.5/8";
02000	P10 F3;
02100	P11 F11;
02200	END;